#include "protheus.ch"

USER FUNCTION SysUpd01()
Local aAlter	:= {}

aAdd(aAlter,{'A','SX3','E5_ARQRAT','X3_TAMANHO',              20,              26})
aAdd(aAlter,{'A','SX3','E5_RATEIO','X3_TRIGGER',' ','S'})

aAdd(aAlter,{'A','SX3','CTJ_CCD','X3_VLDUSER','CtbAmarra(TMP->CTJ_DEBITO,M->CTJ_CCD,TMP->CTJ_ITEMD,TMP->CTJ_CLVLDB,.T.)                                                        ','CtbAmarra(TMP->(IF(FIELDPOS("CTJ_DEBITO")>0,CTJ_DEBITO,"")),M->CTJ_CCD,TMP->CTJ_ITEMD,TMP->CTJ_CLVLDB,.T.)                      '})
aAdd(aAlter,{'A','SX3','CTJ_CCC','X3_VLDUSER','CtbAmarra(TMP->CTJ_CREDIT,M->CTJ_CCC,TMP->CTJ_ITEMC,TMP->CTJ_CLVLCR,.T.)                                                        ','CtbAmarra(TMP->(IF(FIELDPOS("CTJ_CREDIT")>0,CTJ_CREDIT,"")),M->CTJ_CCC,TMP->CTJ_ITEMC,TMP->CTJ_CLVLCR,.T.)                      '})
aAdd(aAlter,{'A','SX3','CTJ_ITEMD','X3_VLDUSER','CtbAmarra(TMP->CTJ_DEBITO,TMP->CTJ_CCD,M->CTJ_ITEMD,TMP->CTJ_CLVLDB,.T.)                                                        ','CtbAmarra(TMP->(IF(FIELDPOS("CTJ_DEBITO")>0,CTJ_DEBITO,"")),TMP->CTJ_CCD,M->CTJ_ITEMD,TMP->CTJ_CLVLDB,.T.)                      '})
aAdd(aAlter,{'A','SX3','CTJ_ITEMC','X3_VLDUSER','CtbAmarra(TMP->CTJ_CREDIT,TMP->CTJ_CCC,M->CTJ_ITEMC,TMP->CTJ_CLVLCR,.T.)                                                        ','CtbAmarra(TMP->(IF(FIELDPOS("CTJ_CREDIT")>0,CTJ_CREDIT,"")),TMP->CTJ_CCC,M->CTJ_ITEMC,TMP->CTJ_CLVLCR,.T.)                      '})

aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_CAMPO','','E5_RATEIO '})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_SEQUENC','','001'})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_REGRA','','u_DoitG001()                                                                                        '})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_CDOMIN','','E5_RATEIO '})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_TIPO','','P'})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_SEEK','','N'})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_ALIAS','','   '})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_ORDEM','',             0})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_CHAVE','','                                                                                                    '})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_CONDIC','','                                        '})
aAdd(aAlter,{'I','SX7','E5_RATEIO 001','X7_PROPRI','','U'})


Return(aAlter)